home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 49 / Amiga Format CD49 (2000-01-17)(Future Publishing)(GB)(Track 1 of 3)[!][issue 2000-02].iso / -serious- / comms / other / novia / scripts / edit_commandentry.nsl < prev    next >
Text File  |  1999-12-06  |  2KB  |  41 lines
  1. ENTRY = LOADCOMMANDENTRY(ARGSTRING)
  2.  
  3. MENU_MAIN = MENU(MENUTAG_COLS, 2, MENUTAG_AUTOFORMAT,
  4.     RETURN("Save",        TRUE),                                    RETURN("Exit without save",        FALSE),
  5.     NULL,                                                                NULL,
  6.     PRINT("IDNumber",                ENTRY->IDNUMBER),            PRINT("Serial IP",            ENTRY->IPNUMBER),
  7.     FIELD("Title",                    ENTRY->TITLE),                NULL,
  8.     FIELD("Filename",                ENTRY->FILENAME),            NULL,
  9.     FIELD("Comment",                ENTRY->COMMENT),            NULL,
  10.     FIELD("Size",                    ENTRY->SIZE),                 FIELD("Blocks",                ENTRY->NUMBEROFBLOCKS),
  11.     FIELD("Protection",            ENTRY->PROTECTION),        NULL,
  12.     FIELD("UserID",                ENTRY->UID),                FIELD("GroupID",                ENTRY->GID),
  13.     FIELD("LastChange",            ENTRY->LASTCHANGE),        FIELD("by User",                ENTRY->LASTCHANGEUSERIP), 
  14.     FIELD("Send Date",            ENTRY->SENDDATE),         FIELD("by User",                ENTRY->CREATEUSERIP),
  15.     FIELD("Create From",            ENTRY->FROM),                FIELD("Create RealName",    ENTRY->FROMREALNAME),
  16.     FIELD("Alias",                    ENTRY->ALIAS),                NULL,
  17.     FIELD("Version",                ENTRY->VERSION),             FIELD("Arc transform",        ENTRY->ARCTRANSFORM), 
  18.     FIELD("Expiration Date",    ENTRY->EXPIRATIONDATE), FIELD("Expiration Days",    ENTRY->EXPIRATIONDAYS), 
  19.     FIELD("Network Type",        ENTRY->NETWORKTYPE),        NULL,
  20.     FIELD("Internal CMD",        ENTRY->INTERNAL),            FIELD("Internal CMD-ID",    ENTRY->COMMANDID), 
  21.     FIELD("Deleted",                ENTRY->DELETED),            FIELD("Closed",                ENTRY->CLOSED),
  22.     FIELD("Defauld Droped",        ENTRY->DEFDROPED),        FIELD("No Items",                ENTRY->NOITEMS),
  23.     FIELD("Access",                ENTRY->ACCESSLEVEL),        FIELD("Post Access",            ENTRY->POSTACCESS),
  24.     FIELD("Upload Access",        ENTRY->UPLOADACCESS),    FIELD("Download Access",    ENTRY->DOWNLOADACCESS),
  25.     FIELD("Reply Access",        ENTRY->REPLYACCESS),        FIELD("Computertype",        ENTRY->COMPUTERTYPES),
  26.     FIELD("Mins. enter",            ENTRY->MINENTER),            FIELD("Max Mins",                ENTRY->MAXMINS),
  27.     FIELD("Youngest",                ENTRY->YOUNGEST),            FIELD("Oldest",                ENTRY->OLDEST),
  28.     FIELD("Gender",                ENTRY->GENDER),            NULL,
  29.     FIELD("Realnames",            ENTRY->REALNAMES),        FIELD("Private msgs.",        ENTRY->PRIVATEMAILS),
  30.     FIELD("Anonymous",            ENTRY->ANONYMOUS),        NULL,
  31.     FIELD("No signatures",        ENTRY->NOSIGNATURES),    FIELD("Overwrite",            ENTRY->OVERRIDE),
  32.     FIELD("Down Bytes",            ENTRY->DOWNBYTES),        FIELD("Down Files",            ENTRY->DOWNFILES),
  33.     FIELD("Free Days",            ENTRY->FREEDAYS),            NULL,
  34.     FIELD("Time Credit",            ENTRY->TIMECREDIT),        NULL,
  35. )
  36.  
  37. JUMP MENU_MAIN
  38.  
  39. IF MENU_MAIN = TRUE THEN SAVECOMMANDENTRY(ENTRY)
  40.  
  41. EXIT